/*  Copyright © 2009 Blake Hegerle -*- C++ -*- */

/*  This file is part of metal.
 
    Metal is free software: you can redistribute it and/or modify it
    under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    General Public License for more details.
 
    You should have received a copy of the GNU General Public License
    along with this program.  If not, see
    <http://www.gnu.org/licenses/>.

*/

#include "metal.h"

namespace {
  ident(f);
}

void native_tests() {
  printf("native_tests\n");
  
  using namespace metal;
  using namespace metal::meta;
  using namespace metal::driver;

  typedef lambda_expr<int, constant_expr<int> > meta_expr;
  
  expression<meta_expr> e = recdef<int>()( 0 );
  
  assignment<true, meta_f, meta_expr> assign = (f = e);

  module<> m0("m0");

  typedef binding<meta_f, list<int> > f_bound;
  module<bindings<f_bound>, set<meta_f> > m1 = (m0, assign);
}
